home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 21 / AACD 21.iso / AACD / Utilities / Ghostscript / src / gdev4693.c < prev    next >
Encoding:
C/C++ Source or Header  |  2001-01-01  |  5.0 KB  |  170 lines
  1. /*
  2.  *    Copyright 1992 Washington State University. All rights reserved.
  3.  *
  4.  * Permission to use, copy, modify, and distribute this software and its
  5.  * documentation for any purpose and without fee is hereby granted.
  6.  * This software is provided "as is" without express or implied warranty.
  7.  */
  8.  
  9. /*$Id: gdev4693.c,v 1.1 2000/03/09 08:40:40 lpd Exp $*/
  10. /* Driver for the Tektronix 4693d color plotter. */
  11. #include "gdevprn.h"
  12. #define prn_dev ((gx_device_printer *)dev) /* needed in 5.31 et seq */
  13.  
  14. /* Thanks to Karl Hakimian (hakimian@yoda.eecs.wsu.edu) */
  15. /* for contributing this code to Aladdin Enterprises. */
  16.  
  17. #define X_DPI 100
  18. #define Y_DPI 100
  19. #define WIDTH_10THS 85
  20. #define HEIGHT_10THS 110
  21.  
  22. private dev_proc_print_page(t4693d_print_page);
  23. private dev_proc_map_rgb_color(gdev_t4693d_map_rgb_color);
  24. private dev_proc_map_color_rgb(gdev_t4693d_map_color_rgb);
  25.  
  26. private gx_device_procs t4693d_procs =
  27.     prn_color_procs(gdev_prn_open, gdev_prn_output_page, gdev_prn_close,
  28.         gdev_t4693d_map_rgb_color, gdev_t4693d_map_color_rgb);
  29.  
  30. #define t4693d_prn_device(name,depth,max_rgb) {prn_device_body( \
  31.     gx_device_printer,t4693d_procs,name, \
  32.     WIDTH_10THS, HEIGHT_10THS, X_DPI, Y_DPI, 0.25, 0.25, 0.25, 0.25, \
  33.     3,depth,max_rgb,max_rgb,max_rgb + 1,max_rgb + 1, \
  34.     t4693d_print_page)}
  35.  
  36. gx_device_printer gs_t4693d2_device = t4693d_prn_device("t4693d2",8, 3);
  37. gx_device_printer gs_t4693d4_device = t4693d_prn_device("t4693d4",16, 15);
  38. gx_device_printer gs_t4693d8_device = t4693d_prn_device("t4693d8",24, 255);
  39.  
  40. private gx_color_index
  41. gdev_t4693d_map_rgb_color(gx_device *dev,
  42.     gx_color_value r, gx_color_value g, gx_color_value b)
  43. {
  44.     ushort bitspercolor = prn_dev->color_info.depth / 3;
  45.     ulong max_value = (1 << bitspercolor) - 1;
  46.  
  47.     if (bitspercolor == 5) {
  48.         bitspercolor--;
  49.         max_value = (1 << bitspercolor) - 1;
  50.     }
  51.  
  52.     return ((r*max_value/gx_max_color_value) << (bitspercolor*2)) +
  53.         ((g*max_value/gx_max_color_value) << bitspercolor) +
  54.         (b*max_value/gx_max_color_value);
  55. }
  56.  
  57. private int
  58. gdev_t4693d_map_color_rgb(gx_device *dev, gx_color_index color, ushort prgb[3])
  59. {
  60.     gx_color_value gray = color*gx_max_color_value/dev->color_info.max_gray;
  61.     prgb[0] = gray;
  62.     prgb[1] = gray;
  63.     prgb[2] = gray;
  64.     return(0);
  65. }
  66.  
  67. private int
  68. t4693d_print_page(gx_device_printer *dev, FILE *ps_stream)
  69. {
  70.     char header[32];
  71.     int depth = prn_dev->color_info.depth;
  72.     int line_size = gdev_mem_bytes_per_scan_line(prn_dev);
  73.     byte *data = (byte *)gs_malloc(line_size, 1, "t4693d_print_page");
  74.     char *p;
  75.     ushort data_size = line_size/prn_dev->width;
  76.     int checksum;
  77.     int lnum;
  78.     int i;
  79. #if !arch_is_big_endian
  80.     byte swap;
  81. #endif
  82.  
  83.     if (data == 0) return_error(gs_error_VMerror);
  84.     /* build header. */
  85.     p = header;
  86.     *p++ = 0x14;    /* Print request */
  87.     *p++ = 0xc0|20;    /* Length of header */
  88.     *p++ = 0xc0 | ((prn_dev->width >> 6)&0x3f);
  89.     *p++ = 0x80 | (prn_dev->width&0x3f);
  90.     *p++ = 0xc0 | ((prn_dev->height >> 6)&0x3f);
  91.     *p++ = 0x80 | (prn_dev->height&0x3f);
  92.     *p++ = 0xc1;    /* Handshake */
  93.     *p++ = 0xc0;    /* Get number of prints from printer. */
  94.     *p++ = 0xc0;    /* Get pixel shape from printer. */
  95.     *p++ = (depth == 8) ? 0xcb : (depth == 16) ? 0xcc : 0xcd;
  96.     *p++ = 0xc1;    /* Pixel-data order 1. */
  97.     *p++ = 0xc3;    /* Interpolate to maximum size. */
  98.     *p++ = 0xc3;    /* Full color range 1. */
  99.     *p++ = 0xc0;    /* Color conversion from printer. */
  100.     *p++ = 0xc0;    /* Color manipulation from printer. */
  101.     *p++ = 0xc0;    /* B/W inversion from printer. */
  102.     *p++ = 0xc3;    /* Portrait mode centered. */
  103.     *p++ = 0xc9;    /* Use printer default for media and printing. */
  104.     *p++ = 0x95;
  105.     *p++ = 0x81;
  106.  
  107.     for (checksum = 0, i = 0; &header[i] != p; i++)
  108.         checksum += header[i];
  109.         
  110.     *p++ = ((checksum%128)&0x7f) | 0x80;
  111.     *p = 0x02; /* end of line. */
  112.     /* write header */
  113.     if (fwrite(header,1,22,ps_stream) != 22) {
  114.         fprintf(stderr,"Could not write header (t4693d).\n");
  115.         gs_free(data, line_size, 1, "t4693d_print_page");
  116.         return_error(gs_error_ioerror);
  117.     }
  118.  
  119.     for (lnum = 0; lnum < prn_dev->height; lnum++) {
  120.         gdev_prn_copy_scan_lines(prn_dev,lnum,data,line_size);
  121.  
  122.         for (i = 0; i < line_size; i += data_size) {
  123.  
  124.             switch (depth) {
  125.             case 8:
  126.                 data[i] &= 0x3f;
  127.                 break;
  128.             case 16:
  129. #if arch_is_big_endian
  130.                 data[i] &= 0x0f;
  131. #else
  132.                 swap = data[i];
  133.                 data[i] = data[i + 1]&0x0f;
  134.                 data[i + 1] = swap;
  135. #endif
  136.                 break;
  137.             case 24:
  138.                 break;
  139.             default:
  140.                 fprintf(stderr,"Bad depth (%d) t4693d.\n",depth);
  141.                 gs_free(data, line_size, 1, "t4693d_print_page");
  142.                 return_error(gs_error_rangecheck);
  143.             }
  144.  
  145.             if (fwrite(&data[i],1,data_size,ps_stream) != data_size) {
  146.                 fprintf(stderr,"Could not write pixel (t4693d).\n");
  147.                 gs_free(data, line_size, 1, "t4693d_print_page");
  148.                 return_error(gs_error_ioerror);
  149.             }
  150.  
  151.         }
  152.  
  153.         if (fputc(0x02,ps_stream) != 0x02) {
  154.             fprintf(stderr,"Could not write EOL (t4693d).\n");
  155.             gs_free(data, line_size, 1, "t4693d_print_page");
  156.             return_error(gs_error_ioerror);
  157.         }
  158.  
  159.     }
  160.  
  161.     if (fputc(0x01,ps_stream) != 0x01) {
  162.         fprintf(stderr,"Could not write EOT (t4693d).\n");
  163.         gs_free(data, line_size, 1, "t4693d_print_page");
  164.         return_error(gs_error_ioerror);
  165.     }
  166.  
  167.     gs_free(data, line_size, 1, "t4693d_print_page");
  168.     return(0);
  169. }
  170.